Mark XEmacs compat alias as obsolete

* lisp/subr.el (user-original-login-name): Mark as obsolete.  This
XEmacs compat alias was obsoleted even by XEmacs, so there is no point
in keeping it around.

diff --git a/lisp/subr.el b/lisp/subr.el
index 8eb4cf452d163f146c1b0a0845a751bfeb0ea8e5..0bd09c6556d65d980b88523edcbfbcc22ac5dc60 100644 (file)
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1649,7 +1649,8 @@ be a list of the form returned by `event-start' and `event-end'."
 (defalias 'point-at-eol 'line-end-position)
 (defalias 'point-at-bol 'line-beginning-position)
 
-(defalias 'user-original-login-name 'user-login-name)
+(define-obsolete-function-alias 'user-original-login-name
+  'user-login-name "28.1")
 
 \f
 ;;;; Hook manipulation functions.